(ps-print-region-function): Fix :type.

diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index 18e463ded6ebf3997fbb2b45ee39860fbd7d8c3a..502ded397fdb729f1479c742f76a1cb787f34f8d 100644 (file)
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -1654,7 +1654,7 @@ an explicit filename is given as the last argument."
   "*Specify a function to print the region on a PostScript printer.
 See definition of `call-process-region' for calling conventions.  The fourth and
 the sixth arguments are both nil."
-  :type 'function
+  :type '(choice (const nil) function)
   :group 'ps-print-printer)
 
 (defcustom ps-manual-feed nil